home *** CD-ROM | disk | FTP | other *** search
/ AmigActive 10 / AACD 10.iso / AACD / Utilities / DigitalAlmanac / Installation / Install < prev   
Encoding:
Text File  |  2000-03-22  |  12.6 KB  |  545 lines
  1. ;$VER:Digital Almanac II Installer Script 1.8.8
  2.  
  3. (procedure P_INSTALL_EXE
  4.     (
  5.     (set #dest-cat-dir (tackon #dest-dir "Catalogs"))
  6.     (set #dest-fonts-dir (tackon #dest-dir "Fonts"))
  7.     (set #dest-icons-dir (tackon #dest-dir "Icons"))
  8.     (set #dest-toolbar-dir (tackon #dest-dir "Toolbar"))
  9.     (set #dest-install-dir (tackon #dest-dir "Installation"))
  10.     (set #dest-pictures-dir (tackon #dest-dir "Pictures"))
  11.     (set #dest-projects-dir (tackon #dest-dir "Projects"))
  12.     (set #dest-user-dir (tackon #dest-dir "User"))
  13.     (set #dest-bin-dir (tackon #dest-dir "Bin"))
  14.     (set #dest-docks-dir (tackon #dest-dir "DockIcons"))
  15.     (set #dest-misc-dir (tackon #dest-dir "Misc"))
  16.     
  17.     (set #langnum
  18.         (askchoice
  19.             (prompt #choose-lang)
  20.             (choices "Deutsch" "English" "Français" "Italiano")
  21.             (help @askchoice-help)
  22.             (default #choose-lang-def)
  23.         )
  24.     )
  25.  
  26.     (set #langcat
  27.         (select #langnum
  28.         "Deutsch" "English" "Français" "Italiano"
  29.         )
  30.     )
  31.     
  32.     (set #langdoc
  33.         (select #langnum
  34.         "Deutsch" "English" "English" "English"
  35.         )
  36.     )
  37.     
  38.     (set #src-lang-dir (tackon "/Catalogs" #langcat))
  39.     (set #src-docs-dir (tackon "/Docs" #langdoc))
  40.     (set #dest-lang-dir (tackon #dest-cat-dir #langcat))
  41.     
  42.     (working #msg-install-exe)
  43.  
  44.     (makedir #dest-dir)
  45.  
  46.     (copyfiles
  47.         (source "//Install_DigitalAlmanac.info")
  48.         (dest #inst-dir)
  49.         (newname (tackon #inst-dir "DigitalAlmanac.info"))
  50.     )
  51.  
  52.     (if (patmatch "68020|68030" (database "cpu"))
  53.         (set #daname "/DigitalAlmanac.020")
  54.         (set #daname "/DigitalAlmanac.040")
  55.     )
  56.  
  57.     (copyfiles
  58.         (source #daname)
  59.         (newname "DigitalAlmanac")
  60.         (dest #dest-dir)
  61.     )
  62.  
  63.     (copyfiles
  64.         (source "/DigitalAlmanac.info")
  65.         (dest #dest-dir)
  66.     )
  67.  
  68.     (copyfiles
  69.         (source (tackon #src-docs-dir "DigitalAlmanac.guide"))
  70.         (dest #dest-dir)
  71.         (infos)
  72.     )
  73.     
  74.     (makedir #dest-cat-dir)
  75.     (makedir #dest-lang-dir)
  76.     (copyfiles
  77.         (source (tackon #src-lang-dir "DigitalAlmanac.catalog"))
  78.         (dest #dest-lang-dir)
  79.     )
  80.     
  81.     (makedir #dest-fonts-dir)
  82.     (copyfiles
  83.         (source "/Fonts")
  84.         (dest #dest-fonts-dir)
  85.         (all)
  86.     )
  87.     
  88.     (makedir #dest-icons-dir)
  89.     (copyfiles
  90.         (source "/Icons.info")
  91.         (dest #dest-dir)
  92.     )
  93.     (copyfiles
  94.         (source "/Icons")
  95.         (dest #dest-icons-dir)
  96.         (all)
  97.     )
  98.  
  99.     (makedir #dest-misc-dir)
  100.     (copyfiles
  101.         (source "/Misc")
  102.         (dest #dest-misc-dir)
  103.         (all)
  104.     )
  105.  
  106.     (makedir #dest-toolbar-dir)
  107.     (copyfiles
  108.         (source "/Toolbar")
  109.         (dest #dest-toolbar-dir)
  110.         (all)
  111.     )
  112.  
  113.     (makedir #dest-install-dir)
  114.     (copyfiles
  115.         (source "/Installation.info")
  116.         (dest #dest-dir)
  117.     )
  118.     (copyfiles
  119.         (source "/Installation")
  120.         (dest #dest-install-dir)
  121.         (all)
  122.     )
  123.     
  124.     (makedir #dest-pictures-dir)
  125.     (copyfiles
  126.         (source "/Pictures.info")
  127.         (dest #dest-dir)
  128.     )
  129.  
  130.     (makedir #dest-projects-dir)
  131.     (copyfiles
  132.         (source "/Projects.info")
  133.         (dest #dest-dir)
  134.     )
  135.  
  136.     (makedir #dest-bin-dir)
  137.     (copyfiles
  138.         (source "/Bin")
  139.         (dest #dest-bin-dir)
  140.         (all)
  141.     )
  142.     
  143.     (makedir #dest-user-dir)
  144.  
  145.     (copylib
  146.         (prompt "asyncio.library")
  147.         (help @copylib-help)
  148.         (source "/Libs/asyncio.library")
  149.         (dest "LIBS:")
  150.         (confirm "average")
  151.     )
  152.  
  153.     (if (patmatch "68020|68030" (database "cpu"))
  154.         (set #jpegname "jpeg.library_020881")
  155.         (set #jpegname "jpeg.library_040881")
  156.     )
  157.  
  158.     (copylib
  159.         (prompt "jpeg.library")
  160.         (help @copylib-help)
  161.         (source (tackon "/Libs" #jpegname))
  162.         (dest "LIBS:")
  163.         (newname "jpeg.library")
  164.         (confirm "average")
  165.     )
  166.  
  167.     (copylib
  168.         (prompt "NList.mcc")
  169.         (help @copylib-help)
  170.         (source "/Libs/MUI/NList.mcc")
  171.         (dest "MUI:Libs/MUI")
  172.         (confirm "average")
  173.     )
  174.  
  175.     (copylib
  176.         (prompt "NListview.mcc")
  177.         (help @copylib-help)
  178.         (source "/Libs/MUI/NListview.mcc")
  179.         (dest "MUI:Libs/MUI")
  180.         (confirm "average")
  181.     )
  182.  
  183.     (copylib
  184.         (prompt "NFloattext.mcc")
  185.         (help @copylib-help)
  186.         (source "/Libs/MUI/NFloattext.mcc")
  187.         (dest "MUI:Libs/MUI")
  188.         (confirm "average")
  189.     )
  190.  
  191.     (copylib
  192.         (prompt "NListviews.mcp")
  193.         (help @copylib-help)
  194.         (source "/Libs/MUI/NListviews.mcp")
  195.         (dest "MUI:Libs/MUI")
  196.         (confirm "average")
  197.     )
  198.  
  199.     (copylib
  200.         (prompt "HotkeyString.mcc")
  201.         (help @copylib-help)
  202.         (source "/Libs/MUI/HotkeyString.mcc")
  203.         (dest "MUI:Libs/MUI")
  204.         (confirm "average")
  205.     )
  206.  
  207.     (copylib
  208.         (prompt "TransferAnim.mcc")
  209.         (help @copylib-help)
  210.         (source "/Libs/MUI/TransferAnim.mcc")
  211.         (dest "MUI:Libs/MUI")
  212.         (confirm "average")
  213.     )
  214.  
  215.     (copylib
  216.         (prompt "TransferAnim.mcp")
  217.         (help @copylib-help)
  218.         (source "/Libs/MUI/TransferAnim.mcp")
  219.         (dest "MUI:Libs/MUI")
  220.         (confirm "average")
  221.     )
  222.  
  223.     (copylib
  224.         (prompt "imagepool.library")
  225.         (help @copylib-help)
  226.         (source "/Libs/imagepool.library")
  227.         (dest "LIBS:")
  228.         (confirm "average")
  229.     )
  230.  
  231.     (makedir #dest-docks-dir)
  232.     (copyfiles
  233.         (source "/DockIcons.info")
  234.         (dest #dest-dir)
  235.     )
  236.     (copyfiles
  237.         (source "/DockIcons")
  238.         (dest #dest-docks-dir)
  239.         (all)
  240.     )
  241.  
  242.     (set #dest-arexx-dir (tackon #dest-dir "ARexx"))
  243.     (makedir #dest-arexx-dir)
  244.     (copyfiles
  245.         (source "/ARexx.info")
  246.         (dest #dest-dir)
  247.     )
  248.     (copyfiles
  249.         (source "/ARexx")
  250.         (dest #dest-arexx-dir)
  251.         (all)
  252.     )
  253.  
  254.     (set #dest-developer-dir (tackon #dest-dir "Developer"))
  255.     (makedir #dest-developer-dir)
  256.     (copyfiles
  257.         (source "/Developer.info")
  258.         (dest #dest-dir)
  259.     )
  260.     (copyfiles
  261.         (source "/Developer")
  262.         (dest #dest-developer-dir)
  263.         (all)
  264.     )
  265.     
  266.     )
  267. )
  268.  
  269. (procedure P_INSTALL_DATA
  270.     (
  271.     (set #arc-dir
  272.         (askdir
  273.             (prompt #ask-dir-data)
  274.             (help @askdir-help)
  275.             (default @default-dest)
  276.             (disk)
  277.         )
  278.     )
  279.     (working #msg-install-data)
  280.     (set #arc (tackon #arc-dir "DAlmanac_Data.lha"))
  281.     (run (cat #lha " e \"" #arc "\" \"" (tackon #dest-dir "") "\""))
  282.     (set @default-dest #arc-dir)
  283.     )
  284. )
  285.  
  286. (procedure P_INSTALL_MAPS
  287.     (
  288.     (set #arc-dir
  289.         (askdir
  290.             (prompt #ask-dir-maps)
  291.             (help @askdir-help)
  292.             (default @default-dest)
  293.             (disk)
  294.         )
  295.     )
  296.     (working #msg-install-maps)
  297.     (set #arc (tackon #arc-dir "DAlmanac_Maps.lha"))
  298.     (run (cat #lha " e \"" #arc "\" \"" (tackon #dest-dir "") "\""))
  299.     (set @default-dest #arc-dir)
  300.     )
  301. )
  302.  
  303. (procedure P_INSTALL_AST
  304.     (
  305.     (set #arc-dir
  306.         (askdir
  307.             (prompt #ask-dir-ast)
  308.             (help @askdir-help)
  309.             (default @default-dest)
  310.             (disk)
  311.         )
  312.     )
  313.     (working #msg-install-ast)
  314.     (set #arc (tackon #arc-dir "DAlmanac_Ast.lha"))
  315.     (run (cat #lha " e \"" #arc "\" \"" (tackon #dest-dir "") "\""))
  316.     (set @default-dest #arc-dir)
  317.     )
  318. )
  319.  
  320. (procedure P_INSTALL_DS
  321.     (
  322.     (set #arc-dir
  323.         (askdir
  324.             (prompt #ask-dir-ds)
  325.             (help @askdir-help)
  326.             (default @default-dest)
  327.             (disk)
  328.         )
  329.     )
  330.     (working #msg-install-ds)
  331.     (set #arc (tackon #arc-dir "DAlmanac_DS.lha"))
  332.     (run (cat #lha " e \"" #arc "\" \"" (tackon #dest-dir "") "\""))
  333.     (set @default-dest #arc-dir)
  334.     )
  335. )
  336.  
  337. (procedure P_INSTALL_EXTRA
  338.     (
  339.     (set #arc-dir
  340.         (askdir
  341.             (prompt #ask-dir-extra)
  342.             (help @askdir-help)
  343.             (default @default-dest)
  344.             (disk)
  345.         )
  346.     )
  347.     (working #msg-install-extra)
  348.     (set #arc (tackon #arc-dir "DAlmanac_Extra.lha"))
  349.     (run (cat #lha " e \"" #arc "\" \"" (tackon #dest-dir "") "\""))
  350.     (set @default-dest #arc-dir)
  351.     )
  352. )
  353.  
  354. (procedure P_INSTALL_USER
  355.     (
  356.     (working #msg-install-user)
  357.     (copyfiles
  358.         (source "/User")
  359.         (pattern "#?.data")
  360.         (dest #dest-user-dir)
  361.     )
  362.     (if (= #langnum 0)
  363.         (copyfiles
  364.             (source "/User/ngcnames.data.deutsch")
  365.             (dest #dest-user-dir)
  366.             (newname "ngcnames.data")
  367.         )
  368.         (copyfiles
  369.             (source "/User/ngcnames.data.english")
  370.             (dest #dest-user-dir)
  371.             (newname "ngcnames.data")
  372.         )
  373.     )
  374.  
  375.     (if (= #langnum 0)
  376.         (copyfiles
  377.             (source "/User/place.data.deutsch")
  378.             (dest #dest-user-dir)
  379.             (newname "place.data")
  380.         )
  381.         (copyfiles
  382.             (source "/User/place.data.english")
  383.             (dest #dest-user-dir)
  384.             (newname "place.data")
  385.         )
  386.     )
  387.  
  388.     (copyfiles
  389.         (source "/Projects")
  390.         (dest #dest-projects-dir)
  391.         (all)
  392.     )
  393.     )
  394. )
  395.  
  396. (if (= @language "deutsch")
  397.     (
  398.     (set #choose-inst "Bitte wählen Sie die Archive aus, welche Sie installieren möchten.\nArchive mit '**' sind für eine Erstinstallation notwendig !!\n\
  399. Die Benutzerdateien (Projekte, Ortsliste, Bahnelemente) sollten\n Sie nicht installieren, wenn Sie nur ein Update möchten !")
  400.     (set #inst-exe "Installation des Hauptarchivs **")
  401.     (set #inst-data "Installation der Hauptdaten **")
  402.     (set #inst-maps "Installation der Oberflächentexturen")
  403.     (set #inst-ast "Installation des Asteroidenkataloges")
  404.     (set #inst-ds "Installation der Deep-Sky Objektkataloge")
  405.     (set #inst-extra "Installation des großen Sternkataloges (Extra)")
  406.     (set #inst-user "Vorkonfigurierte Benutzerdateien")
  407.     (set #ask-dest1 "Wählen Sie ein Verzeichnis aus,\nwo Digital Almanac II installiert werden soll.\nEine Schublade 'DigitalAlmanac' wird automatisch erzeugt.")
  408.     (set #ask-dest2 "In welchem Verzeichnis befindet sich der Ordner 'DigitalAlmanac' ?")
  409.     (set #ask-dir-lha "In welchem verzeichnis befindet sich 'Lha' ?")
  410.     (set #ask-dir-data "In welchem Verzeichnis befindet sich 'DAlmanac_Data.lha' ?")
  411.     (set #ask-dir-maps "In welchem Verzeichnis befindet sich 'DAlmanac_Maps.lha' ?")
  412.     (set #ask-dir-ast "In welchem Verzeichnis befindet sich 'DAlmanac_Ast.lha' ?")
  413.     (set #ask-dir-ds "In welchem Verzeichnis befindet sich 'DAlmanac_DS.lha' ?")
  414.     (set #ask-dir-extra "In welchem Verzeichnis befindet sich 'DAlmanac_Extra.lha' ?")
  415.     (set #choose-lang "Wählen Sie eine Sprache für Digital Almanac II aus.")
  416.     (set #choose-lang-def 0)
  417.     (set #msg-install-exe "Installiere Digital Almanac II.")
  418.     (set #msg-install-data "Installiere Daten.")
  419.     (set #msg-install-maps "Installiere Oberflächentexturen.")
  420.     (set #msg-install-ast "Installiere Asteroiden.")
  421.     (set #msg-install-ds "Installiere Deep-Sky Objekte.")
  422.     (set #msg-install-extra "Installiere großen Sternenkatalog.")
  423.     (set #msg-install-user "Installiere Benutzerdateien.")
  424.     (set #msg-nothing-chosen "Es wurde kein Archiv ausgewählt !!")
  425.    (set #msg-ende "Bitte lesen Sie noch das Kapitel Installation im Guide, um noch einige notwendige MUI-Einstellungen durchzuführen. Diese müssen Sie manuell vornehmen.\n\n\
  426. Vergessen Sie nicht in ihrem MUI-Einsteller das Flag Fenster/Refresh auf SMART zu stellen, da sonst Digital Almanac abstürzt !!")
  427.     )
  428. )
  429. (if (= @language "english")
  430.     (
  431.     (set #choose-inst "Please choose the archives, you like to install.\nArchives marked with '**' are necessary for a first installation !!\n\
  432. You should not install the user files (projects,\nlocation list, orbital elements), if you only update !")
  433.     (set #inst-exe "Installation of the main exe archiv")
  434.     (set #inst-data "Installation of the main basic datas")
  435.     (set #inst-maps "Installation of the surface textures")
  436.     (set #inst-ast "Installation of the asteroid catalog")
  437.     (set #inst-ds "Installation of the deep-sky object catalogs")
  438.     (set #inst-extra "Installation of the large star catalog (extra)")
  439.     (set #inst-user "Preconfigured user files")
  440.     (set #ask-dest1 "Choose directory to install Digital Almanac II.\nA drawer 'DigitalAlmanac' will automatically be created.")
  441.     (set #ask-dest2 "What is the directory of the folder 'DigitalAlmanac' ?")
  442.     (set #ask-dir-lha "In which drawer is 'Lha' ?")
  443.     (set #ask-dir-data "In which drawer is 'DAlmanac_Data.lha' ?")
  444.     (set #ask-dir-maps "In which drawer is 'DAlmanac_Maps.lha' ?")
  445.     (set #ask-dir-ast "In which drawer is 'DAlmanac_Ast.lha' ?")
  446.     (set #ask-dir-ds "In which drawer is 'DAlmanac_DS.lha' ?")
  447.     (set #ask-dir-extra "In which drawer is 'DAlmanac_Extra.lha' ?")
  448.     (set #choose-lang "Select language you want to use with Digital Almanac II.")
  449.     (set #choose-lang-def 1)
  450.     (set #msg-install-exe "Installing Digital Almanac II.")
  451.     (set #msg-install-data "Installing datas.")
  452.     (set #msg-install-maps "Installing surface textures.")
  453.     (set #msg-install-ast "Installing asteroids.")
  454.     (set #msg-install-ds "Installing deep-sky objects.")
  455.     (set #msg-install-extra "Installing large star catalog.")
  456.     (set #msg-install-user "Installing user files.")
  457.     (set #msg-nothing-chosen "No archive has been chosen !!")
  458.    (set #msg-ende "Please read the chapter Installation in the Guide to adjust some necessary MUI settings. These must be done manually.\n\n\
  459. Don't forget to set the flag Windows/Refresh to SMART in your MUI pref !! Otherwise Digital Almanac will crash !")
  460.     )
  461. )
  462.  
  463. (set #install-arc
  464.     (askoptions
  465.         (prompt #choose-inst)
  466.         (choices #inst-exe #inst-data #inst-maps #inst-ast #inst-ds #inst-extra #inst-user)
  467.         (default 3)
  468.         (help @askchoice-help)
  469.     )
  470. )
  471.  
  472. (if (= #install-arc 0)
  473. (exit #msg-nothing-chosen)
  474. )
  475.  
  476. (if (BITAND #install-arc 1)
  477.     (set #inst-dir
  478.         (askdir
  479.             (prompt #ask-dest1)
  480.             (help @askdir-help)
  481.             (default @default-dest)
  482.             (disk)
  483.         )
  484.     )
  485.     (if (= 0 (exists "//DigitalAlmanac.info"))
  486.         (set #inst-dir
  487.             (askdir
  488.                 (prompt #ask-dest2)
  489.                 (help @askdir-help)
  490.                 (default @default-dest)
  491.                 (disk)
  492.             )
  493.         )
  494.         (set #inst-dir "//")
  495.     )
  496. )
  497.  
  498. (set #dest-dir (tackon #inst-dir "DigitalAlmanac"))
  499.  
  500. (if (BITAND #install-arc 62)
  501.     (
  502.     (set #lha-dir
  503.         (askdir
  504.             (prompt #ask-dir-lha)
  505.             (help @askdir-help)
  506.             (default "C:")
  507.             (disk)
  508.         )
  509.     )
  510.     (set #lha (tackon #lha-dir "Lha"))
  511.     )
  512. )
  513.  
  514. (if (BITAND #install-arc 1)
  515.     (P_INSTALL_EXE)
  516. )
  517.  
  518. (if (BITAND #install-arc 2)
  519.     (P_INSTALL_DATA)
  520. )
  521.  
  522. (if (BITAND #install-arc 4)
  523.     (P_INSTALL_MAPS)
  524. )
  525.  
  526. (if (BITAND #install-arc 8)
  527.     (P_INSTALL_AST)
  528. )
  529.  
  530. (if (BITAND #install-arc 16)
  531.     (P_INSTALL_DS)
  532. )
  533.  
  534. (if (BITAND #install-arc 32)
  535.     (P_INSTALL_EXTRA)
  536. )
  537.  
  538. (if (BITAND #install-arc 64)
  539.     (P_INSTALL_USER)
  540. )
  541.  
  542. (set @default-dest #inst-dir)
  543. (message #msg-ende)
  544.  
  545.